** Loading data - generated in dofile: data05
use "$data\minwage_data5_estimation_2012_2015.dta", clear
keep if inrange(tline,-24,24) // 49 event-month oberservation window 
replace apprentice = apprentice * 100

** Figure A.6: Employment as an Apprentice
preserve
collapse (count) observations = pnr  (mean) felt_200_trim (mean) emplyd (mean) apprentice, by(tline)
				
	two connected apprentice tline if inrange(tline, -24, 24), color(black) msize(large) ///
		graphregion(color(white)) ///
		yti("Apprentices employment (%)") ylabel(0(5)30) xline(-12, lcolor(grey)) xline(0, lcolor(grey)) xline(12, lcolor(grey)) ///
		xti("Month relative to 18th birthday") xlabel(-24(2)24) scale(0.85) 
		graph export "$out\Apndx_Figure6_apprentices_employment_dofile_descrp04.png", width(800) height(600) replace	
restore
